Option Explicit
'u@Ҳ
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
    MsgBox Target.SubAddress & "cWsC"
    'MsgBox Target.Address & "cWsC"
End Sub
